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Yes, it's finally herel Included in this issue of the "^Transactor" 
are chapters 1 through 7 of the new PET Users Manual. Chapters 8 
through 9 and the appendices will be made available in the next 
bulletin, January 1979* This release will cover November as well 
as December. 



Karl J. 



STAMDAKD SYMBOLS 

I have assembled a small table of symbols that are not hard 
to obtain from a typewriter (if you are using one) and are quite 
distinguishable if you write out your programs in capital block 
letters. It would be appreciated if you use these when submitting 
software for publication; especially programs containing cursor 
control. 

SYMBOLS 



h - 


cursor home 


- 


carriage return 
space t^blank) 


c - 


clear screen 


^ - 


cr- 


cursor right 


1 


EVS on 


cl- 


cursor left 


/ - 


RVS off 


cu- 


cursor up 


@ - 


Shift on 


cd- 


cursor down 






d - 


delete 






1 - 


insert 







To represent any graphic characters clearly, the character 
below should be followed by the *@* . For example : 

S = I® (M w/Shift on) 

Following this standard should make programs fairly easy to 
read however any suggestions are quite welcome. 



Karl J. 



Commodore would like to take this opportunity to announce 
the appointment of Mr. Karl J. Hildon as our new Technical Advisor 
for the Computer Division. 

Mr. Hildon has a Diploma in electronic^ technology and has 
taken some courses in computer programming. He will be in charge 
of answering any software and/or hardware inquiries pertaining 
to the PET computer and upcoming peripherals. If you have any 
questions, please do not hesitate to call Mr. Hildon at Commodore 
or write: 

Karl J. Hildon 

Commodore Business Ifechines Ltd 

Computer Division 

3370 Pharmacy Avenue 

Agincourt, Ont. MIM 2K4 

Tel: 499-4292. 

Karl is also actively interested in the interfacing aspect of the 
PET computer and would like to learn more as time progresses. He 
has therefore written the following letter which will be included 

with any hardware information he sends out and has asked that it 
be inserted here. 

"Dear Interfacers: 

Xour requested User Port and/or IEEE-488 Bus information has 
arrived I Should you find the enclosed data insufficient, 
please call or write Commodore. However, if it does assist 
•you to a solution, please write in with any interesting 
discoveries or ideas. They would be much appreciated and may 
find their way into a "Transactor" bulletinl 

Yours sincerely, 



Earl Hildon 
Technical Advisor 
Computer Division 
P.S. All published articles will get author recognition." 



Mr, Hildon will also be, for the most part, our "Transactor' 
bulletin editor. Therefore, letters, articles, software, 
circuitry, discoveries or anything at all that you feel you would 
like to see published in our "Transactor" should be addressed to: 

Karl J. 

Commodore Business Machines Ltd. 

"Transactor" bulletin 

3370 Pharmacy Avenue 

Agincourt, Ont. Ml¥ 2K4 

Brief replies will be included in the "Transactor" following 
any letters submitted for the "Transactor" and'any articles 
will receive full recognition of the author provided they haven't 
been published previously or elsewhere. 

In the meantime, your enthusiasm and interest in the PET 
computer is most refreshing. Keep it coming I 



NEWSLETTER ADDRESSES 

1. The "Tranasctor" (subs. $10.00 Cdn.) 
3570 Pharmacy Avenue 

Agincourt, Ont. 
MIW 2K4 

2. PET User Notes (subs. S6.00 U.S.) 
P.O. Box 371 

Hontgomersrville, PA 18936 

3. THE PET PAPER (subs. $15-00 U.S.) 
P.O. Box 43 

Audubon, PA 19407 

4. Cursor (subs. $24.00 U.S.) 
P.O. Box 550 

Goleta, Calif. 93017 

5. The PET Gazette (Free w/lg. S.A.S.E. U.S. postage) 
c/o Len Lindsay 

1929 Northport Drive 

Room 6 

Madison, Wisconsin 53704 



TAPE LIBEA.RY 

Club 2001, the Toronto PIJT Users Group, now lias an active 
tape library. The deal is $3.00 deposit which is refunded upon 
return. The only drawback is that access to the tapes is limited 
to club meetings and evenings at Lyman Duggan's, the Club co- 
ordi;iator. Lyman and I have' made arrangements to make copies 
of the entire library, which incidentally stands at 70 and growing, 
and make them available through the day. Anyone who wishes to 
obtain a library program is invited to come to the Commodore 
office in Agincourt and make a copy. Please bring a blank tape 
with and any other programs you might like to add to the library. 



Karl J. 



Peripherals 

The Disc Drive and Printers are coming. I know you've 
all heard that before but we'll be announcing a date January 
6 as to availability and so forth. Those of you who purchase 
and wish to convert to Floppy Disc storage can get the DOS 
ROMs free of charge once available. The Printers are directly 
int^rfacable to the PET and will have 'intelligence' such that 
they will accept formatting commands for business applications, 
etc. More detailed descriptions and specifications will be 
available from Commodore as of Jan. 6 and will be published 
in the next Transactor. 

Karl J. 



Le PET ^ ' ^ ^ 

An instruction course on the PET is being offered at 
Irisco du Quebec and will be taught in French. Cost of the 
programme will be $75*00 which will also coi/er manuals and notes. 
The course is 15 hours long plus additional practice time and will 
begin the first week of January, 1979- Anyone interested should 
contact: 

Hr. Ricardo Talbot 

Irisco du Quebec 

357 Bo'ul. Chares t Est., 

Quebec City, Que. GIK 5J2 • 

Tel: 418-647-4422 

Also, Mr. Talbot has a tape available containing 11 games, all 
of which are in French. 



Un cours D' instruction en Francais sera a votre disposition chez 
Irisco du Quebec. Le prix du cours est $75*00 qui comprent des 
notes et des manuels. Le cours va commencer dans la premiere 
semaine du mois de Janvier 1979 et va couvrir 15 heures de 
le9ons, en plus le temps pour la practique. Si vous etes 
interesses contactez svp: 

M. Eicardo Talbot 
Irisco du Quebec 
537 Boul. Chares t Est., 
Quebec City, Que. Glk 5J2 
Tel: 418-647-4422 

M. Talbot aura, aus si a votre. disposition les cassettes , contenant 
11 jeux tous en Francais. . ' ' ' ' 



PMSH 

Richvale Telecommimi cations* 1^6 10 ilayvlew Ave; Richmond 
Hill, Ontario L4C 3N8 884-4165 are pleased to announce 
tv/o new interfaces for the Pet 2001-8. 
"Hampet": Amorse and IITTY interface, 

"Mod pet" J For sending computer information over the phone. 
The "Harapet" is a morse and aifY(MudQt) interface. lou simply 
plug the «Hampet" into the Pet, and your ready to display, 
transmit and receive 'morse and RTfl at rates upto lOOWPil, 
The interface will also send random words and characters, 
displayed and with audio from a Imllt in side tone oscillator 
and speaker. In addition the "Harapet" can re-transmit 400 
characters fro?n memory for "brag" transmissions, 
!i»he "Hami«t" is sold \Tired and tested, and comes in an 
attractive , blue and sand, sloping front.aluralnum case, with 
on-off .volume control, frequency control,PLL control, tune 
LED, on I»ED, head phone muting Jack and four RCA phone jaoks. 
The "Hampet" is capable of perfect copy with an "S4" signal. 

The "Mod pet" plugs into the Pet and is interfaced to the red 

and green phone wires, the audio level is adjusted with a YU 

meter and the user can trade tai«s and play interactive gajnes 

over the telephone, The "liodpet" is not directly audio coupled 

into the line resulting in superb send and receive. 

It is suggested that potential buyers first check with their 

local Bell off ice, for in spite of recent court rulings, Bell 

may insist on installing a coupler.The "Modpet" is not suitable 

for long distance due to distortion and the narrower band 

width created by "Ma &11". 

The "Hampet** retails for 189 dollars with immediate deliirery. 

The "Modpet" retails for 79 dollars with three week delivery. 

Dealer enq.uiries are invited. 

Ben Arnold VE3EYB Richvale Telecommunications. 



Jim Butterf ield, well known PET enthusiast, has sent to 
Cominodore a couple of interesting items which have also been 

passed on to PET User Notes. "Thanks Jim and thanks for 

recognizing Brad as a source — maybe he'll send in something 
else as well. -Karl J. 



SiiMaary of Cassette data file "patchw" 

The following information has been passed arourai users, and ia 

now "official" with the issuance of a CcHfmodore bulletin. It seems 

worth while to sunwsarize briefly: 

1. Opening a Hie tor writiiis : an owdbision in CTrrent E« pr<«rf wa 
Ejakes it highly desirable to precede aU OIEN atatiiwnts with 

a couple of POKEs: . * ' 

before OPEN x,l,.. for writing: POKE 2h3,122 't POffi 2hh,2 
before OPEN x,2,.. for writing: POKE 2ii3,58 : POKE 2hh,3 

2. When writing taoes, it is useful to increase the spacing between 
tape blocks J otherwise you might miss a block during subaeouent 
reading. There are several apnroaches to this? my technique is 
to call the following subroutine immediately after each PSINT#: 

Cassette #1 Cassette #2 

950 IF Z9<-PEEK(625)QOTO 990 950 IF Z9<-PEEK(6g6 )GOTO 990 

960 POKE 59iill,53 960 POKE 591456,20? 

" 970 FOR Z9-1 TO 60:NEXT Z9 970 FOR Z9-1 TO 60: NEXT Z9 

980 POKE 59bll,6l 980 P0K£ 59lj56,223 

990 Z9-PEEK(625):RETtJRN 990 Z9-PEEK(626)sRETURN 

3. Even with the above coding, it seems wise to gtiard against a 
potential "dropped block". Think in terms of writing a "number 
of items" total on tape so that when reading, you can check that 
nothing has been lost. 

h* Don't PRINT# a line of over 80 characters unless you're pr^ared 
to do some careful work with GBT# statenwnts when you read it back 
in. In general, avoid "print punctuation" when writing (PRIin'#l, A|B 
... ffiIOT#2, lS,i:$)| each data element can be wdtten as a separate 
"line". Watch tar long strings. 

5. Either: check the valae of ST after every read, or use jawr own 
; cheekily routines on your data. ST ci3i~Be useful, but do^n't 

guarantee your data is lOC^ good. IF ST-0 ,. no errors are seeni 
IF S!I%3 .. you have cone to the end of filei if anything else, 
an error has been detected. 

6, Always CMSE your cassette files arter you're finished with them. 
Wien writing, your data is accumulated into a buffer ., if you 
don't CLOSE, it wmy not go onto tape. 

Most Basic ©rrws abort the cassette file without CKKEing itj 
if this happeiw while you have a cassette tape open for writing, 
better start over . . your tape will likely have data missing. 



UNLIST Havlalted Jim Butterfield, Toronto 

Lany Tessler's UNLIST appeared in User Notes without imich fanfare. 
If you can read between the lines, however (and cope with the 
typos ) it 's quite a blockbuster of a prc^ram. 

In general, it allow a program to be handled as data . . . tising the 
UNLIST key, you can re-process progianB as if they were data files , 
and create such things as program-wilting programs, language traralstors, 
and many oth^r startling things. 

Perhaps the most imriBdiate use of UNLIST for the casual comouterist 
is to mei^e two prograro together. Om program could contakin 
subroutines J and these could be merged with other programs to 
sa-^B a lot of typir^. It 's especially useful to be able to merge 
a single set of DATA statements into several programs, each of 
which is set 13^ to process the DATA in different ways. 

Brad Terapleton (Toronto) has passed me an even more concise way of 

doir^ the same thing. I'll go through the whole operation, step by 

step. 

First, prepare the -DroCTan you will want to merge in the following 
maimer. Load the proerara. Put a blank tape into the cassette and 
rewind. Enter OPEN 1.1,1 ; GMD 1 j LET. * Be sure to out this on 
a single line, using colons as indicated. Press RECORD and PIAY as 
instructed. The taoe wiU move. When it stoos. type ?"P0KE6ll,0": 
PRINT#liCIDSSl. Totrr tape is now ready, and PET should be back to 
normal operation. You nay file this tape and use it at any future 
tijw. 

Now for the mex^a. When you have your second program loaded into 
the PET, mount the tape you have previoasly written. Type OFENl, 
press PLAY as requested, and wait for the tape to stop, 

Sere com^ the tricky bit. Clear the screen, give k carear down's, 

and type tte following line, but m NOT HIT RETURN; 

POKE611,lJPOKE5^,l:POIE527,13s?"h" (h is Cursor Home, displaying reverse S) 

Don't hit return. Instead, press cursor hcsne and 6 cursor downs ... 
then type the identical line. This time, hit RETURN at the end of 

the line Aoi listen to the tape move. 

E^ntualLy, things idU stop with a ?SINTAX ERROR or ?ODT OF DATA 
printed between the two lims, and the tape should stop, (if it 
doesn't, stqs it with the EUN-STOP tey). The ^rge is now complete. 

Type CLCBE 1 to close the file. 

(The ?"?0KS611,0" in oaragraph 5 nay be unnecessary .. I pttt it there 
to guard agaiiat a processor crash situation I encountered during 
early testing ... ) 



Jim has also submitted a schematic of a circuit he demons 
demonstrated at the first meeting of the Toronto PET Users 
Group. The schematic has been published in the club 
newsletter and Lyman Duggan suggested I pass it on to 
Transactor subscribers. Thame again Jim. -Karl J. 



Poor Man's D/A Converter 

Cheapj good for generating Chamberlin/stvle music. Precision 
resistors are preferred, but most anything mil rsnerate a 
recogniyable sound. 

Section B of the diapran stinnorts the CB2 sound effects - so that 

one interface board covers most soimd reaiiirements. 
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The capacitor provides some reduction of the sannling frecmency 
(when generatii^ music) .. tone controls on the |a amplifier will 
also helps if available. 



The HUH "Petunia" gives a high quality equivalent of this converter. 
Toronto price ~ about $liO. 



Reference: see BYTE, September 1977, lengthy article by Hal Chamber lin 
on computer-generated music, 650? programs are given. 



The "ON... GOTO" Statement 

e.g. 100 ON I GOTO 10, 20, 146, 2040 

The above statement, when encountered, will cause program 
execution to branch to the line indicated by the I'th number after 
the GOTO. That is: 

If 1=1 GOTO 10 

If 1=2 GOTO 20 

If 1=3 GOTO 146 

If 1=4.4 GOTO 2040 

I is truncated to an integer value. If I is equal to zero, or attempts 
to select a non-existent line (greater than or equal to 5) , in this 
case the statement after the ON... GOTO is executed. As many line 
numbers as will fit on a line can follow an ON... GOTO. Thus the main 
purpose is to eliminate successive IF... GOTO statements and save on 
memory consumption. 

e.g. 200 ON SGN(X)+2 GOTO 40, 50, 310 

In this case, execution will branch to line 40 if the SGN(X) expression 
is less than zero, line 50 if equal to zero and line 310 if equal to 
one. 

When using expressions in the ON... GOTO statement, do not 
allow the final result to be negative. Implement an ABS function into 
the expression, else an ILLEGAL QUANTITY ERROR will result. 

The "ON...GOSUB" Statement 

Identical to the ON... GOTO statement except that a subroutine 
call is executed Instead of an absolute GOTO. On return from the 
subroutine, execution continues at the line following the ON...GOSUB. 

A Short Note On Subroutines 

Jumping out of a subroutine can be HAZARDOUS! That is, 
subroutines containing IF...GOTO's or ON...GOTO's can cause an OUT OF 
MEMORY ERROR for this reason: When a program encounters a GOSUB, the 
machine loads the return address into a stack area. The subroutine is 
then executed and let's say 'jumps out' on a GOTO statement within the 
subroutine. Thus the RETURN statement is never executed and the return 
address is not unloaded from the stack. The stack will fill to the 
limit and the error message results. 



To avoid this problem the ON... GOTO statement can be used 
Instead of RETURN. Thus all GOSUB statements directed at that 
particular subroutine must also be replaced with absolute GOTO's. 
By implementing a control variable just prior to the GOTO, the 
return addresses can be placed after the ON... GOTO in the subroutine 
and the hazard is eliminated. For example: 

100 C=1:G0T0 5000 Subroutine address 

110 REM RETURN FROM SUB. 

500 C=2:G0T0 5000 Same subroutine 

510 REM RETURN FROM SUB. 



5000 REM SUBROUTINE 
5010^ 

' C 'SUBROUTINE' 

5080 -^ 

5090 ON C GOTO 110, 510 Instead of RETURN 



gAILSAFING 

Recently I have received a number of inquiries on how to 
avoid entering the command mode by hitting "EETUEN" after an 
input statement without data entry. I know of three such 
methods: 



1. The "GET" loop instead 



e.g. 20 GET A^: IP A$=" " THEN 20 

50 PRINT A^ 



The above routine will loop continuously in line 20 until a 
key is depressed. Once entry is made, the routine will print 
the entry be it alphabetic, numeric or graphic character. 
Use of the numeric variable is confusing because even if no 
key has been struck, the value returned is zero. That is: 



20 GET A: IP STR$(A)=" " THEN 20 
50 PRINT A 



will return immediately. 



2. Forced Input 



If after an INPUT statement you arrange an invalid input to 
the right of the '?', hitting "RETURN" will result in a ? 
REDO PROM START and go back to the INPUT statement. Por 
example : 



10 INPUT "A VALUE W^M H clclclcl";A 
20 PRINT A 



The cursor is left 2 character spaces beyond the '?'. 
Therefore you must arrange your 'invalid input' such that 
it will be erased by the entry else it will be included 
(be it to the right or left of the entry), and a ?RED0 PROM 
START will be returned. 



The above routine does not work with string variables because 

' % ' will be accepted as an alphabetic input if "EETUEN" is hit. 

Therefore a test statement must be added: 



10 INPUT "A CHAR. ymy> % clclclcl";AS 
15 II A| = " % " THEN 10 
20 PRINT A| 



3. Opening the Keyboard as a Pile 

By assigning the keyboard a file number using the OPEN 
statement and opening that file for reading, all input statements 
will accept data only as an entiy. The following program will 
demonstrate this. 



1 OPEN 1,0,0 (last optional) 



500 PRINT "A VALUE?"; 
510 INPUT #1,A^ 
520 PRINT: PRINT k% 
550 END 

The open statement may be placed at the very beginning of 
the program and may even be line 0. Other programming can 
be inserted (between 1 and 500). The preceding words and '?• 
must be displayed using a PRINT statement (line 500). The 
double PRINT'S in line 520 are required to get A$ to print 
on the next screen line. Otherwise A$ will be displayed 
just to the right of the entry. 

If anyone should find bugs with this due to not closing 

the file or otherwise, please let me know so that I may pass 

it on. 



Karl J. 



